
<html>

<head>
  <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
  <title>Head</title>
  <style media="screen" type="text/css">

    body
    {
      color: #000000;
      background-color: #FFFFFF;
    }

    /* Link formats: use maroon w/underlines */
    a:link
    {
      color: navy;
      text-decoration: underline;
    }
    a:visited
    {
      color: maroon;
      text-decoration: underline;
    }
    a:active
    {
      color: navy;
      text-decoration: underline;
    }

    /*** TD formats ***/
    td
    {
      font-family: sans-serif;
    }
    td.title
    {
      text-align: center;
      padding-bottom: 10px;
      font-size: 20pt;
      font-weight: bold;
    }

    /* TD Header Information */
    td.headerName
    {
      text-align: right;
      color: black;
      padding-right: 6px;
      font-weight: bold;
      vertical-align: top;
      white-space: nowrap;
    }
    td.headerValue
    {
      text-align: left;
      color: blue;
      font-weight: bold;
      white-space: nowrap;
    }
    td.headerTableEntry
    {
      text-align: right;
      color: black;
      font-weight: bold;
      white-space: nowrap;
      padding-left: 12px;
      padding-right: 4px;
      background-color: LightBlue;
    }
    td.headerValueLeg
    {
      text-align: left;
      color: black;
      font-size: 80%;
      white-space: nowrap;
      padding-left: 10px;
      padding-right: 10px;
      padding-top: 2px;
    }

    /* Color of horizontal ruler */
    td.hr
    {
      background-color: navy;
      height:3px;
    }
    /* Footer format */
    td.footer
    {
      text-align: center;
      padding-top: 3px;
      font-family: sans-serif;
    }

    /* Coverage Table */

    td.coverTableHead
    {
      text-align: center;
      color: white;
      background-color: SteelBlue;
      font-family: sans-serif;
      font-size: 120%;
      white-space: nowrap;
      padding-left: 4px;
      padding-right: 4px;
    }
    td.coverFile
    {
      text-align: left;
      padding-left: 10px;
      padding-right: 20px;
      color: black;
      background-color: LightBlue;
      font-family: monospace;
      font-weight: bold;
      font-size: 110%;
    }
    td.coverBar
    {
      padding-left: 10px;
      padding-right: 10px;
      background-color: LightBlue;
    }
    td.coverBarOutline
    {
      background-color: white;
    }
    td.coverValue
    {
      padding-top: 2px;
      text-align: right;
      padding-left: 10px;
      padding-right: 10px;
      font-family: sans-serif;
      white-space: nowrap;
      font-weight: bold;
    }

    /* Link Details */
    a.detail:link
    {
      color: #B8D0FF;
      font-size:80%;
    }
    a.detail:visited
    {
      color: #B8D0FF;
      font-size:80%;
    }
    a.detail:active
    {
      color: #FFFFFF;
      font-size:80%;
    }

    .graphcont{
        color:#000;
        font-weight:700;
        float:left
    }

    .graph{
        float:left;
        background-color: white;
        position:relative;
        width:280px;
        padding:0
    }

    .graph .bar{
        display:block;
        position:relative;
        border:black 1px solid;
        text-align:center;
        color:#fff;
        height:10px;
        font-family:Arial,Helvetica,sans-serif;
        font-size:12px;
        line-height:1.9em
    }

    .graph .bar span{
        position:absolute;
        left:1em
    }

    td.coveredLine,
    span.coveredLine
    {
        background-color: LightGreen!important;
    }

    td.uncoveredLine,
    span.uncoveredLine
    {
        background-color: LightPink!important;
    }

    .linebranch, .linecount
    {
        border-right: 1px gray solid;
        background-color: lightgray;
    }

    span.takenBranch
    {
        color: Green!important;
        cursor: help;
    }

    span.notTakenBranch
    {
        color: Red!important;
        cursor: help;
    }

    .src
    {
        padding-left: 12px;
    }

    .srcHeader,
    span.takenBranch,
    span.notTakenBranch
    {
        font-family: monospace;
        font-weight: bold;
    }

    pre
    {
        height : 15px;
        margin-top: 0;
        margin-bottom: 0;
    }

    .lineno
    {
        background-color: #EFE383;
        border-right: 1px solid #BBB15F;
    }

  </style>
</head>

<body>

  <table width="100%" border="0" cellspacing="0" cellpadding="0">
    <tr><td class="title">GCC Code Coverage Report</td></tr>
    <tr><td class="hr"></td></tr>

    <tr>
      <td width="100%">
        <table cellpadding="1" border="0" width="100%">
          <tr>
            <td width="10%" class="headerName">Directory:</td>
            <td width="35%" class="headerValue">../src/</td>
            <td width="5%"></td>
            <td width="15%"></td>
            <td width="10%" class="headerValue" style="text-align:right;">Exec</td>
            <td width="10%" class="headerValue" style="text-align:right;">Total</td>
            <td width="15%" class="headerValue" style="text-align:right;">Coverage</td>
          </tr>
          <tr>
            <td class="headerName">File:</td>
            <td class="headerValue">/home/joels/Current/lispbm/src/heap.c</td>
            <td></td>
            <td class="headerName">Lines:</td>
            <td class="headerTableEntry">687</td>
            <td class="headerTableEntry">824</td>
            <td class="headerTableEntry" style="background-color:#FFFF55">83.4 %</td>
          </tr>
          <tr>
            <td class="headerName">Date:</td>
            <td class="headerValue">2024-12-05 14:36:58</td>
            <td></td>
            <td class="headerName">Branches:</td>
            <td class="headerTableEntry">247</td>
            <td class="headerTableEntry">351</td>
            <td class="headerTableEntry" style="background-color:LightPink">70.4 %</td>
          </tr>
        </table>
      </td>
    </tr>

    <tr><td class="hr"></td></tr>
  </table>

  <br>
  <table cellspacing="0" cellpadding="1">
    <tr>
      <td width="5%" align="right" class="srcHeader">Line</td>
      <td width="5%" align="right" class="srcHeader">Branch</td>
      <td width="5%" align="right" class="srcHeader">Exec</td>
      <td width="75%" align="left" class="srcHeader src">Source</td>
    </tr>


    <tr>
    <td align="right" class="lineno"><pre>1</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>/*</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>2</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    Copyright 2018, 2020, 2022 - 2024 Joel Svensson  svenssonjoel@yahoo.se</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>3</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>                          2022        Benjamin Vedder</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>4</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>5</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    This program is free software: you can redistribute it and/or modify</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>6</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    it under the terms of the GNU General Public License as published by</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>7</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    the Free Software Foundation, either version 3 of the License, or</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>8</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    (at your option) any later version.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>9</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>10</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    This program is distributed in the hope that it will be useful,</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>11</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    but WITHOUT ANY WARRANTY; without even the implied warranty of</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>12</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>13</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    GNU General Public License for more details.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>14</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>15</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    You should have received a copy of the GNU General Public License</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>16</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    along with this program.  If not, see &lt;http://www.gnu.org/licenses/>.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>17</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>*/</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>18</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>19</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include &lt;stdio.h></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>20</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include &lt;stdlib.h></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>21</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include &lt;stdint.h></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>22</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include &lt;stdarg.h></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>23</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include &lt;inttypes.h></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>24</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include &lt;lbm_memory.h></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>25</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include &lt;lbm_custom_type.h></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>26</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include &lt;lbm_defrag_mem.h></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>27</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>28</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include "heap.h"</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>29</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include "symrepr.h"</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>30</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include "stack.h"</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>31</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include "lbm_channel.h"</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>32</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include "platform_mutex.h"</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>33</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include "eval_cps.h"</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>34</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifdef VISUALIZE_HEAP</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>35</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#include "heap_vis.h"</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>36</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>37</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>38</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>39</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>33812031</pre></td>
    <td align="left" class="src coveredLine"><pre>static inline lbm_value lbm_set_gc_mark(lbm_value x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>40</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>33812031</pre></td>
    <td align="left" class="src coveredLine"><pre>  return x | LBM_GC_MARKED;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>41</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>42</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>43</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>33645801</pre></td>
    <td align="left" class="src coveredLine"><pre>static inline lbm_value lbm_clr_gc_mark(lbm_value x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>44</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>33645801</pre></td>
    <td align="left" class="src coveredLine"><pre>  return x &amp; ~LBM_GC_MASK;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>45</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>46</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>47</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>804727716</pre></td>
    <td align="left" class="src coveredLine"><pre>static inline bool lbm_get_gc_mark(lbm_value x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>48</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>804727716</pre></td>
    <td align="left" class="src coveredLine"><pre>  return x &amp; LBM_GC_MASK;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>49</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>50</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>51</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// flag is the same bit as mark, but in car</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>52</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>static inline bool lbm_get_gc_flag(lbm_value x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>53</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return x &amp; LBM_GC_MARKED;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>54</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>55</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>56</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>static inline lbm_value lbm_set_gc_flag(lbm_value x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>57</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return x | LBM_GC_MARKED;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>58</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>59</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>60</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>static inline lbm_value lbm_clr_gc_flag(lbm_value x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>61</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return x &amp; ~LBM_GC_MASK;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>62</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>63</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>64</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>65</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>lbm_heap_state_t lbm_heap_state;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>66</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>67</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>lbm_const_heap_t *lbm_const_heap_state;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>68</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>69</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>lbm_cons_t *lbm_heaps[2] = {NULL, NULL};</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>70</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>71</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>static mutex_t lbm_const_heap_mutex;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>72</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>static bool    lbm_const_heap_mutex_initialized = false;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>73</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>74</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>static mutex_t lbm_mark_mutex;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>75</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>static bool    lbm_mark_mutex_initialized = false;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>76</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>77</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifdef USE_GC_PTR_REV</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>78</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>void lbm_gc_lock(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>79</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  mutex_lock(&amp;lbm_mark_mutex);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>80</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>81</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>void lbm_gc_unlock(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>82</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  mutex_unlock(&amp;lbm_mark_mutex);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>83</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>84</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>85</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>void lbm_gc_lock(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>86</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>87</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>void lbm_gc_unlock(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>88</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>89</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>90</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>91</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>/****************************************************/</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>92</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>/* ENCODERS DECODERS                                */</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>93</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>94</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2849162</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_enc_i32(int32_t x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>95</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifndef LBM64</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>96</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2849162</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value i = lbm_cons((lbm_uint)x, ENC_SYM_RAW_I_TYPE);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>97</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 9674 times">&check;</span><span class="takenBranch" title="Branch 2 taken 2839488 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>2849162</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_type_of(i) == LBM_TYPE_SYMBOL) return i;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>98</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2839488</pre></td>
    <td align="left" class="src coveredLine"><pre>  return lbm_set_ptr_type(i, LBM_TYPE_I32);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>99</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>100</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return (((lbm_uint)x) &lt;&lt; LBM_VAL_SHIFT) | LBM_TYPE_I32;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>101</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>102</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>103</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>104</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3682448</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_enc_u32(uint32_t x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>105</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifndef LBM64</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>106</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3682448</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value u = lbm_cons(x, ENC_SYM_RAW_U_TYPE);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>107</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 2828 times">&check;</span><span class="takenBranch" title="Branch 2 taken 3679620 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>3682448</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_type_of(u) == LBM_TYPE_SYMBOL) return u;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>108</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3679620</pre></td>
    <td align="left" class="src coveredLine"><pre>  return lbm_set_ptr_type(u, LBM_TYPE_U32);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>109</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>110</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return (((lbm_uint)x) &lt;&lt; LBM_VAL_SHIFT) | LBM_TYPE_U32;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>111</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>112</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>113</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>114</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>22782</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_enc_float(float x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>115</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifndef LBM64</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>116</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_uint t;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>117</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>22782</pre></td>
    <td align="left" class="src coveredLine"><pre>  memcpy(&amp;t, &amp;x, sizeof(lbm_float));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>118</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>22782</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value f = lbm_cons(t, ENC_SYM_RAW_F_TYPE);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>119</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span><span class="takenBranch" title="Branch 2 taken 22782 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>22782</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_type_of(f) == LBM_TYPE_SYMBOL) return f;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>120</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>22782</pre></td>
    <td align="left" class="src coveredLine"><pre>  return lbm_set_ptr_type(f, LBM_TYPE_FLOAT);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>121</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>122</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_uint t = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>123</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  memcpy(&amp;t, &amp;x, sizeof(float));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>124</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return (((lbm_uint)t) &lt;&lt; LBM_VAL_SHIFT) | LBM_TYPE_FLOAT;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>125</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>126</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>127</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>128</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifndef LBM64</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>129</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8434134</pre></td>
    <td align="left" class="src coveredLine"><pre>static lbm_value enc_64_on_32(uint8_t *source, lbm_uint type_qual, lbm_uint type) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>130</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8434134</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value res = lbm_cons(ENC_SYM_NIL,ENC_SYM_NIL);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>131</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 8431812 times">&check;</span><span class="takenBranch" title="Branch 2 taken 2322 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>8434134</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_type_of(res) != LBM_TYPE_SYMBOL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>132</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8431812</pre></td>
    <td align="left" class="src coveredLine"><pre>    uint8_t* storage = lbm_malloc(sizeof(uint64_t));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>133</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 8429104 times">&check;</span><span class="takenBranch" title="Branch 1 taken 2708 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>8431812</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (storage) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>134</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8429104</pre></td>
    <td align="left" class="src coveredLine"><pre>      memcpy(storage,source, sizeof(uint64_t));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>135</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8429104</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_set_car_and_cdr(res, (lbm_uint)storage,  type_qual);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>136</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8429104</pre></td>
    <td align="left" class="src coveredLine"><pre>      res = lbm_set_ptr_type(res, type);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>137</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    } else {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>138</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2708</pre></td>
    <td align="left" class="src coveredLine"><pre>      res = ENC_SYM_MERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>139</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>140</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>141</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8434134</pre></td>
    <td align="left" class="src coveredLine"><pre>  return res;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>142</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>143</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>144</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>145</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4495172</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_enc_i64(int64_t x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>146</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifndef LBM64</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>147</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4495172</pre></td>
    <td align="left" class="src coveredLine"><pre>  return enc_64_on_32((uint8_t *)&amp;x, ENC_SYM_IND_I_TYPE, LBM_TYPE_I64);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>148</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>149</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_value u = lbm_cons((uint64_t)x, ENC_SYM_RAW_I_TYPE);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>150</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  if (lbm_type_of(u) == LBM_TYPE_SYMBOL) return u;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>151</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return lbm_set_ptr_type(u, LBM_TYPE_I64);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>152</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>153</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>154</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>155</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3372994</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_enc_u64(uint64_t x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>156</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifndef LBM64</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>157</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3372994</pre></td>
    <td align="left" class="src coveredLine"><pre>  return enc_64_on_32((uint8_t *)&amp;x, ENC_SYM_IND_U_TYPE, LBM_TYPE_U64);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>158</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>159</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_value u = lbm_cons(x, ENC_SYM_RAW_U_TYPE);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>160</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  if (lbm_type_of(u) == LBM_TYPE_SYMBOL) return u;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>161</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return lbm_set_ptr_type(u, LBM_TYPE_U64);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>162</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>163</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>164</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>165</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>565968</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_enc_double(double x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>166</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifndef LBM64</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>167</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>565968</pre></td>
    <td align="left" class="src coveredLine"><pre>  return enc_64_on_32((uint8_t *)&amp;x, ENC_SYM_IND_F_TYPE, LBM_TYPE_DOUBLE);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>168</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>169</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_uint t;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>170</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  memcpy(&amp;t, &amp;x, sizeof(double));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>171</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_value f = lbm_cons(t, ENC_SYM_RAW_F_TYPE);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>172</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  if (lbm_type_of(f) == LBM_TYPE_SYMBOL) return f;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>173</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return lbm_set_ptr_type(f, LBM_TYPE_DOUBLE);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>174</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>175</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>176</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>177</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// Type specific (as opposed to the dec_as_X) functions</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>178</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// should only be run on values KNOWN to represent a value of the type</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>179</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// that the decoder decodes.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>180</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>181</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>33707</pre></td>
    <td align="left" class="src coveredLine"><pre>float lbm_dec_float(lbm_value x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>182</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifndef LBM64</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>183</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  float f_tmp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>184</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>33707</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint tmp = lbm_car(x);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>185</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>33707</pre></td>
    <td align="left" class="src coveredLine"><pre>  memcpy(&amp;f_tmp, &amp;tmp, sizeof(float));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>186</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>33707</pre></td>
    <td align="left" class="src coveredLine"><pre>  return f_tmp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>187</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>188</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  uint32_t tmp = (uint32_t)(x >> LBM_VAL_SHIFT);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>189</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  float f_tmp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>190</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  memcpy(&amp;f_tmp, &amp;tmp, sizeof(float));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>191</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return f_tmp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>192</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>193</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>194</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>195</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>564764</pre></td>
    <td align="left" class="src coveredLine"><pre>double lbm_dec_double(lbm_value x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>196</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifndef LBM64</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>197</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  double d;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>198</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>564764</pre></td>
    <td align="left" class="src coveredLine"><pre>  uint32_t *data = (uint32_t*)lbm_car(x);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>199</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>564764</pre></td>
    <td align="left" class="src coveredLine"><pre>  memcpy(&amp;d, data, sizeof(double));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>200</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>564764</pre></td>
    <td align="left" class="src coveredLine"><pre>  return d;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>201</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>202</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  double f_tmp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>203</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_uint tmp = lbm_car(x);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>204</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  memcpy(&amp;f_tmp, &amp;tmp, sizeof(double));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>205</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return f_tmp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>206</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>207</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>208</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>209</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>7017326</pre></td>
    <td align="left" class="src coveredLine"><pre>uint64_t lbm_dec_u64(lbm_value x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>210</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifndef LBM64</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>211</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  uint64_t u;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>212</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>7017326</pre></td>
    <td align="left" class="src coveredLine"><pre>  uint32_t *data = (uint32_t*)lbm_car(x);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>213</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>7017326</pre></td>
    <td align="left" class="src coveredLine"><pre>  memcpy(&amp;u, data, 8);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>214</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>7017326</pre></td>
    <td align="left" class="src coveredLine"><pre>  return u;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>215</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>216</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return (uint64_t)lbm_car(x);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>217</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>218</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>219</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>220</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>9259084</pre></td>
    <td align="left" class="src coveredLine"><pre>int64_t lbm_dec_i64(lbm_value x) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>221</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifndef LBM64</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>222</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  int64_t i;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>223</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>9259084</pre></td>
    <td align="left" class="src coveredLine"><pre>  uint32_t *data = (uint32_t*)lbm_car(x);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>224</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>9259084</pre></td>
    <td align="left" class="src coveredLine"><pre>  memcpy(&amp;i, data, 8);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>225</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>9259084</pre></td>
    <td align="left" class="src coveredLine"><pre>  return i;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>226</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>227</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  return (int64_t)lbm_car(x);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>228</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>229</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>230</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>231</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>790870</pre></td>
    <td align="left" class="src coveredLine"><pre>char *lbm_dec_str(lbm_value val) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>232</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>790870</pre></td>
    <td align="left" class="src coveredLine"><pre>  char *res = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>233</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  // If val is an array, car of val will be non-null.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>234</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 790674 times">&check;</span><span class="takenBranch" title="Branch 2 taken 196 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>790870</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_array_r(val)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>235</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>790674</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_array_header_t *array = (lbm_array_header_t *)lbm_car(val);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>236</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>790674</pre></td>
    <td align="left" class="src coveredLine"><pre>    res = (char *)array->data;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>237</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>238</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>790870</pre></td>
    <td align="left" class="src coveredLine"><pre>  return res;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>239</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>240</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>241</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>11037165</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_char_channel_t *lbm_dec_channel(lbm_value val) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>242</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>11037165</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_char_channel_t *res = NULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>243</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>244</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 11037165 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>11037165</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_type_of(val) == LBM_TYPE_CHANNEL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>245</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>11037165</pre></td>
    <td align="left" class="src coveredLine"><pre>    res = (lbm_char_channel_t *)lbm_car(val);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>246</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>247</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>11037165</pre></td>
    <td align="left" class="src coveredLine"><pre>  return res;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>248</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>249</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>250</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>980</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_uint lbm_dec_custom(lbm_value val) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>251</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>980</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint res = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>252</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 980 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>980</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_type_of(val) == LBM_TYPE_CUSTOM) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>253</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>980</pre></td>
    <td align="left" class="src coveredLine"><pre>    res = (lbm_uint)lbm_car(val);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>254</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>255</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>980</pre></td>
    <td align="left" class="src coveredLine"><pre>  return res;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>256</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>257</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>258</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>60872</pre></td>
    <td align="left" class="src coveredLine"><pre>uint8_t lbm_dec_as_char(lbm_value a) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>259</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>60872</pre></td>
    <td align="left" class="src coveredLine"><pre>  uint8_t r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>260</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 60648 times">&check;</span><span class="takenBranch" title="Branch 2 taken 28 times">&check;</span><span class="takenBranch" title="Branch 3 taken 28 times">&check;</span><span class="takenBranch" title="Branch 4 taken 28 times">&check;</span><br/><span class="takenBranch" title="Branch 5 taken 28 times">&check;</span><span class="takenBranch" title="Branch 6 taken 28 times">&check;</span><span class="takenBranch" title="Branch 7 taken 28 times">&check;</span><span class="takenBranch" title="Branch 8 taken 28 times">&check;</span><br/><span class="takenBranch" title="Branch 9 taken 28 times">&check;</span><span class="notTakenBranch" title="Branch 10 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>60872</pre></td>
    <td align="left" class="src coveredLine"><pre>  switch (lbm_type_of_functional(a)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>261</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>60648</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_CHAR:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>262</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>60648</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint8_t)lbm_dec_char(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>263</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>264</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint8_t)lbm_dec_i(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>265</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>266</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint8_t)lbm_dec_u(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>267</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>268</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint8_t)lbm_dec_i32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>269</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>270</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint8_t)lbm_dec_u32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>271</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_FLOAT:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>272</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint8_t)lbm_dec_float(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>273</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>274</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint8_t)lbm_dec_i64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>275</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>276</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint8_t)lbm_dec_u64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>277</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_DOUBLE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>278</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint8_t) lbm_dec_double(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>279</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>280</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>60872</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>281</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>282</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>283</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8421779</pre></td>
    <td align="left" class="src coveredLine"><pre>uint32_t lbm_dec_as_u32(lbm_value a) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>284</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8421779</pre></td>
    <td align="left" class="src coveredLine"><pre>  uint32_t r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>285</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 561938 times">&check;</span><span class="takenBranch" title="Branch 2 taken 1275690 times">&check;</span><span class="takenBranch" title="Branch 3 taken 1786917 times">&check;</span><span class="takenBranch" title="Branch 4 taken 4795104 times">&check;</span><br/><span class="takenBranch" title="Branch 5 taken 28 times">&check;</span><span class="takenBranch" title="Branch 6 taken 28 times">&check;</span><span class="takenBranch" title="Branch 7 taken 84 times">&check;</span><span class="takenBranch" title="Branch 8 taken 28 times">&check;</span><br/><span class="takenBranch" title="Branch 9 taken 1962 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>8421779</pre></td>
    <td align="left" class="src coveredLine"><pre>  switch (lbm_type_of_functional(a)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>286</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>561938</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_CHAR:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>287</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>561938</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint32_t)lbm_dec_char(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>288</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1275690</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>289</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1275690</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint32_t)lbm_dec_i(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>290</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1786917</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>291</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1786917</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint32_t)lbm_dec_u(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>292</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4795104</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I32: /* fall through */</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>293</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  case LBM_TYPE_U32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>294</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4795104</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint32_t)lbm_dec_u32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>295</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_FLOAT:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>296</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint32_t)lbm_dec_float(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>297</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>298</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint32_t)lbm_dec_i64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>299</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>84</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>300</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>84</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint32_t)lbm_dec_u64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>301</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_DOUBLE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>302</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint32_t)lbm_dec_double(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>303</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>304</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8421779</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>305</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>306</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>307</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>206222862</pre></td>
    <td align="left" class="src coveredLine"><pre>int32_t lbm_dec_as_i32(lbm_value a) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>308</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>206222862</pre></td>
    <td align="left" class="src coveredLine"><pre>  int32_t r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>309</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 5809792 times">&check;</span><span class="takenBranch" title="Branch 2 taken 196730286 times">&check;</span><span class="takenBranch" title="Branch 3 taken 196 times">&check;</span><span class="takenBranch" title="Branch 4 taken 3674140 times">&check;</span><br/><span class="takenBranch" title="Branch 5 taken 28 times">&check;</span><span class="takenBranch" title="Branch 6 taken 28 times">&check;</span><span class="takenBranch" title="Branch 7 taken 56 times">&check;</span><span class="takenBranch" title="Branch 8 taken 56 times">&check;</span><br/><span class="takenBranch" title="Branch 9 taken 28 times">&check;</span><span class="takenBranch" title="Branch 10 taken 8252 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>206222862</pre></td>
    <td align="left" class="src coveredLine"><pre>  switch (lbm_type_of_functional(a)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>310</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>5809792</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_CHAR:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>311</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>5809792</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int32_t)lbm_dec_char(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>312</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>196730286</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>313</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>196730286</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int32_t)lbm_dec_i(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>314</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>196</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>315</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>196</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int32_t)lbm_dec_u(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>316</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3674140</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>317</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3674140</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int32_t)lbm_dec_i32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>318</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>319</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int32_t)lbm_dec_u32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>320</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_FLOAT:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>321</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int32_t)lbm_dec_float(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>322</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>323</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int32_t)lbm_dec_i64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>324</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>325</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int32_t)lbm_dec_u64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>326</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_DOUBLE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>327</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int32_t) lbm_dec_double(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>328</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>329</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>206222862</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>330</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>331</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>332</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6732120</pre></td>
    <td align="left" class="src coveredLine"><pre>int64_t lbm_dec_as_i64(lbm_value a) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>333</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6732120</pre></td>
    <td align="left" class="src coveredLine"><pre>  int64_t r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>334</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 562266 times">&check;</span><span class="takenBranch" title="Branch 2 taken 1402750 times">&check;</span><span class="takenBranch" title="Branch 3 taken 168 times">&check;</span><span class="takenBranch" title="Branch 4 taken 168 times">&check;</span><br/><span class="takenBranch" title="Branch 5 taken 168 times">&check;</span><span class="takenBranch" title="Branch 6 taken 56 times">&check;</span><span class="takenBranch" title="Branch 7 taken 4766376 times">&check;</span><span class="takenBranch" title="Branch 8 taken 112 times">&check;</span><br/><span class="takenBranch" title="Branch 9 taken 56 times">&check;</span><span class="notTakenBranch" title="Branch 10 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>6732120</pre></td>
    <td align="left" class="src coveredLine"><pre>  switch (lbm_type_of_functional(a)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>335</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>562266</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_CHAR:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>336</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>562266</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int64_t)lbm_dec_char(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>337</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1402750</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>338</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1402750</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int64_t)lbm_dec_i(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>339</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>340</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int64_t)lbm_dec_u(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>341</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>342</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int64_t)lbm_dec_i32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>343</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>344</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int64_t)lbm_dec_u32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>345</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_FLOAT:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>346</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int64_t)lbm_dec_float(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>347</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4766376</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>348</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4766376</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int64_t)lbm_dec_i64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>349</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>350</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int64_t)lbm_dec_u64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>351</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_DOUBLE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>352</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (int64_t) lbm_dec_double(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>353</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>354</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6732120</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>355</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>356</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>357</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4490278</pre></td>
    <td align="left" class="src coveredLine"><pre>uint64_t lbm_dec_as_u64(lbm_value a) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>358</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4490278</pre></td>
    <td align="left" class="src coveredLine"><pre>  uint64_t r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>359</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 562238 times">&check;</span><span class="takenBranch" title="Branch 2 taken 280852 times">&check;</span><span class="takenBranch" title="Branch 3 taken 168 times">&check;</span><span class="takenBranch" title="Branch 4 taken 168 times">&check;</span><br/><span class="takenBranch" title="Branch 5 taken 168 times">&check;</span><span class="takenBranch" title="Branch 6 taken 56 times">&check;</span><span class="takenBranch" title="Branch 7 taken 168 times">&check;</span><span class="takenBranch" title="Branch 8 taken 3646404 times">&check;</span><br/><span class="takenBranch" title="Branch 9 taken 56 times">&check;</span><span class="notTakenBranch" title="Branch 10 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>4490278</pre></td>
    <td align="left" class="src coveredLine"><pre>  switch (lbm_type_of_functional(a)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>360</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>562238</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_CHAR:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>361</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>562238</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint64_t)lbm_dec_char(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>362</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>280852</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>363</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>280852</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint64_t)lbm_dec_i(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>364</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>365</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint64_t)lbm_dec_u(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>366</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>367</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint64_t)lbm_dec_i32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>368</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>369</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint64_t)lbm_dec_u32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>370</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_FLOAT:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>371</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint64_t)lbm_dec_float(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>372</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>373</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint64_t)lbm_dec_i64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>374</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3646404</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>375</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3646404</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint64_t)lbm_dec_u64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>376</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_DOUBLE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>377</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>56</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint64_t)lbm_dec_double(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>378</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>379</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4490278</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>380</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>381</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>382</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2324</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_uint lbm_dec_as_uint(lbm_value a) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>383</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2324</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>384</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span><span class="takenBranch" title="Branch 2 taken 2324 times">&check;</span><span class="notTakenBranch" title="Branch 3 not taken">&cross;</span><span class="notTakenBranch" title="Branch 4 not taken">&cross;</span><br/><span class="notTakenBranch" title="Branch 5 not taken">&cross;</span><span class="notTakenBranch" title="Branch 6 not taken">&cross;</span><span class="notTakenBranch" title="Branch 7 not taken">&cross;</span><span class="notTakenBranch" title="Branch 8 not taken">&cross;</span><br/><span class="notTakenBranch" title="Branch 9 not taken">&cross;</span><span class="notTakenBranch" title="Branch 10 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>2324</pre></td>
    <td align="left" class="src coveredLine"><pre>  switch (lbm_type_of_functional(a)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>385</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_CHAR:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>386</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_uint)lbm_dec_char(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>387</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2324</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>388</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2324</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (lbm_uint)lbm_dec_i(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>389</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_U:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>390</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_uint)lbm_dec_u(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>391</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_I32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>392</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_uint)lbm_dec_i32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>393</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_U32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>394</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_uint)lbm_dec_u32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>395</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_FLOAT:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>396</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_uint)lbm_dec_float(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>397</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_I64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>398</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_uint)lbm_dec_i64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>399</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_U64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>400</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_uint) lbm_dec_u64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>401</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_DOUBLE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>402</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_uint)lbm_dec_double(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>403</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>404</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2324</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>405</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>406</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>407</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>644</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_int lbm_dec_as_int(lbm_value a) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>408</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>644</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_int r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>409</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span><span class="takenBranch" title="Branch 2 taken 644 times">&check;</span><span class="notTakenBranch" title="Branch 3 not taken">&cross;</span><span class="notTakenBranch" title="Branch 4 not taken">&cross;</span><br/><span class="notTakenBranch" title="Branch 5 not taken">&cross;</span><span class="notTakenBranch" title="Branch 6 not taken">&cross;</span><span class="notTakenBranch" title="Branch 7 not taken">&cross;</span><span class="notTakenBranch" title="Branch 8 not taken">&cross;</span><br/><span class="notTakenBranch" title="Branch 9 not taken">&cross;</span><span class="notTakenBranch" title="Branch 10 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>644</pre></td>
    <td align="left" class="src coveredLine"><pre>  switch (lbm_type_of_functional(a)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>410</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_CHAR:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>411</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_int)lbm_dec_char(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>412</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>644</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>413</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>644</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (lbm_int)lbm_dec_i(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>414</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_U:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>415</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_int)lbm_dec_u(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>416</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_I32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>417</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_int)lbm_dec_i32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>418</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_U32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>419</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_int)lbm_dec_u32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>420</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_FLOAT:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>421</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_int)lbm_dec_float(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>422</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_I64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>423</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_int)lbm_dec_i64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>424</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_U64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>425</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_int)lbm_dec_u64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>426</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_DOUBLE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>427</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (lbm_int)lbm_dec_double(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>428</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>429</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>644</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>430</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>431</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>432</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>19903</pre></td>
    <td align="left" class="src coveredLine"><pre>float lbm_dec_as_float(lbm_value a) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>433</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>19903</pre></td>
    <td align="left" class="src coveredLine"><pre>  float r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>434</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 1176 times">&check;</span><span class="takenBranch" title="Branch 2 taken 2128 times">&check;</span><span class="takenBranch" title="Branch 3 taken 140 times">&check;</span><span class="takenBranch" title="Branch 4 taken 140 times">&check;</span><br/><span class="takenBranch" title="Branch 5 taken 196 times">&check;</span><span class="takenBranch" title="Branch 6 taken 15815 times">&check;</span><span class="takenBranch" title="Branch 7 taken 140 times">&check;</span><span class="takenBranch" title="Branch 8 taken 140 times">&check;</span><br/><span class="takenBranch" title="Branch 9 taken 28 times">&check;</span><span class="notTakenBranch" title="Branch 10 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>19903</pre></td>
    <td align="left" class="src coveredLine"><pre>  switch (lbm_type_of_functional(a)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>435</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1176</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_CHAR:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>436</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1176</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (float)lbm_dec_char(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>437</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2128</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>438</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2128</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (float)lbm_dec_i(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>439</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>440</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (float)lbm_dec_u(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>441</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>442</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (float)lbm_dec_i32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>443</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>196</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>444</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>196</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (float)lbm_dec_u32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>445</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>15815</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_FLOAT:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>446</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>15815</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (float)lbm_dec_float(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>447</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>448</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (float)lbm_dec_i64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>449</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>450</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (float)lbm_dec_u64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>451</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_DOUBLE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>452</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (float)lbm_dec_double(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>453</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>454</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>19903</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>455</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>456</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>457</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>564204</pre></td>
    <td align="left" class="src coveredLine"><pre>double lbm_dec_as_double(lbm_value a) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>458</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>564204</pre></td>
    <td align="left" class="src coveredLine"><pre>  double r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>459</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 281168 times">&check;</span><span class="takenBranch" title="Branch 2 taken 280880 times">&check;</span><span class="takenBranch" title="Branch 3 taken 140 times">&check;</span><span class="takenBranch" title="Branch 4 taken 140 times">&check;</span><br/><span class="takenBranch" title="Branch 5 taken 140 times">&check;</span><span class="takenBranch" title="Branch 6 taken 364 times">&check;</span><span class="takenBranch" title="Branch 7 taken 140 times">&check;</span><span class="takenBranch" title="Branch 8 taken 140 times">&check;</span><br/><span class="takenBranch" title="Branch 9 taken 1092 times">&check;</span><span class="notTakenBranch" title="Branch 10 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>564204</pre></td>
    <td align="left" class="src coveredLine"><pre>  switch (lbm_type_of_functional(a)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>460</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>281168</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_CHAR:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>461</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>281168</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (double)lbm_dec_char(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>462</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>280880</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>463</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>280880</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (double)lbm_dec_i(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>464</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>465</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (double)lbm_dec_u(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>466</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>467</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (double)lbm_dec_i32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>468</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>469</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (double)lbm_dec_u32(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>470</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>364</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_FLOAT:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>471</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>364</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (double)lbm_dec_float(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>472</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_I64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>473</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (double)lbm_dec_i64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>474</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_U64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>475</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>140</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (double)lbm_dec_u64(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>476</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1092</pre></td>
    <td align="left" class="src coveredLine"><pre>  case LBM_TYPE_DOUBLE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>477</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1092</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (double)lbm_dec_double(a); break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>478</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>479</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>564204</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>480</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>481</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>482</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>/****************************************************/</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>483</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>/* HEAP MANAGEMENT                                  */</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>484</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>485</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>static int generate_freelist(size_t num_cells) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>486</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  size_t i = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>487</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>488</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 0 not taken">&cross;</span><span class="takenBranch" title="Branch 1 taken 21672 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (!lbm_heap_state.heap) return 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>489</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>490</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.freelist = lbm_enc_cons_ptr(0);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>491</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>492</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_cons_t *t;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>493</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>494</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  // Add all cells to free list</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>495</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 201292632 times">&check;</span><span class="takenBranch" title="Branch 1 taken 21672 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>201314304</pre></td>
    <td align="left" class="src coveredLine"><pre>  for (i = 1; i &lt; num_cells; i ++) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>496</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>201292632</pre></td>
    <td align="left" class="src coveredLine"><pre>    t = lbm_ref_cell(lbm_enc_cons_ptr(i-1));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>497</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>201292632</pre></td>
    <td align="left" class="src coveredLine"><pre>    t->car = ENC_SYM_RECOVERED;    // all cars in free list are "RECOVERED"</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>498</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>201292632</pre></td>
    <td align="left" class="src coveredLine"><pre>    t->cdr = lbm_enc_cons_ptr(i);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>499</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>500</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>501</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  // Replace the incorrect pointer at the last cell.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>502</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  t = lbm_ref_cell(lbm_enc_cons_ptr(num_cells-1));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>503</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  t->cdr = ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>504</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>505</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  return 1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>506</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>507</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>508</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>void lbm_nil_freelist(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>509</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.freelist = ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>510</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.num_alloc = lbm_heap_state.heap_size;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>511</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>512</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>513</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>static void heap_init_state(lbm_cons_t *addr, lbm_uint num_cells,</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>514</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>                            lbm_uint* gc_stack_storage, lbm_uint gc_stack_size) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>515</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.heap         = addr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>516</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.heap_bytes   = (unsigned int)(num_cells * sizeof(lbm_cons_t));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>517</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.heap_size    = num_cells;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>518</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>519</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_stack_create(&amp;lbm_heap_state.gc_stack, gc_stack_storage, gc_stack_size);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>520</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>521</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.num_alloc           = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>522</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.num_alloc_arrays    = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>523</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.gc_num              = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>524</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.gc_marked           = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>525</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.gc_recovered        = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>526</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.gc_recovered_arrays = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>527</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.gc_least_free       = num_cells;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>528</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.gc_last_free        = num_cells;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>529</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>530</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>531</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>void lbm_heap_new_freelist_length(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>532</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint l = lbm_heap_state.heap_size - lbm_heap_state.num_alloc;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>533</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.gc_last_free = l;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>534</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 3838 times">&check;</span><span class="takenBranch" title="Branch 1 taken 344081 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (l &lt; lbm_heap_state.gc_least_free)</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>535</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3838</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_heap_state.gc_least_free = l;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>536</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>537</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>538</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>int lbm_heap_init(lbm_cons_t *addr, lbm_uint num_cells,</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>539</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>                  lbm_uint gc_stack_size) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>540</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>541</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 0 not taken">&cross;</span><span class="takenBranch" title="Branch 1 taken 21672 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (((uintptr_t)addr % 8) != 0) return 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>542</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>543</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  memset(addr,0, sizeof(lbm_cons_t) * num_cells);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>544</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>545</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint *gc_stack_storage = (lbm_uint*)lbm_malloc(gc_stack_size * sizeof(lbm_uint));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>546</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 0 not taken">&cross;</span><span class="takenBranch" title="Branch 1 taken 21672 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (gc_stack_storage == NULL) return 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>547</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>548</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  heap_init_state(addr, num_cells,</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>549</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>                  gc_stack_storage, gc_stack_size);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>550</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>551</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heaps[0] = addr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>552</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>553</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  return generate_freelist(num_cells);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>554</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>555</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>556</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>557</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>365372002</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_heap_allocate_cell(lbm_type ptr_type, lbm_value car, lbm_value cdr) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>558</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_value r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>559</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>365372002</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value cell = lbm_heap_state.freelist;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>560</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 365321510 times">&check;</span><span class="takenBranch" title="Branch 1 taken 50492 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>365372002</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (cell) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>561</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>365321510</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_uint heap_ix = lbm_dec_ptr(cell);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>562</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>365321510</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_heap_state.freelist = lbm_heap_state.heap[heap_ix].cdr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>563</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>365321510</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_heap_state.num_alloc++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>564</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>365321510</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_heap_state.heap[heap_ix].car = car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>565</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>365321510</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_heap_state.heap[heap_ix].cdr = cdr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>566</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>365321510</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = lbm_set_ptr_type(cell, ptr_type);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>567</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  } else {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>568</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>50492</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = ENC_SYM_MERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>569</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>570</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>365372002</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>571</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>572</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>573</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1254984</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_heap_allocate_list(lbm_uint n) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>574</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 3304 times">&check;</span><span class="takenBranch" title="Branch 1 taken 1251680 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>1254984</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (n == 0) return ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>575</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 1264 times">&check;</span><span class="takenBranch" title="Branch 2 taken 1250416 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>1251680</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_heap_num_free() &lt; n) return ENC_SYM_MERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>576</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>577</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1250416</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value curr = lbm_heap_state.freelist;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>578</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1250416</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value res  = curr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>579</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 1250416 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>1250416</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_type_of(curr) == LBM_TYPE_CONS) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>580</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>581</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1250416</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_cons_t *c_cell = NULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>582</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1250416</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_uint count = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>583</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    do {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>584</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6465912</pre></td>
    <td align="left" class="src coveredLine"><pre>      c_cell = lbm_ref_cell(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>585</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6465912</pre></td>
    <td align="left" class="src coveredLine"><pre>      c_cell->car = ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>586</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6465912</pre></td>
    <td align="left" class="src coveredLine"><pre>      curr = c_cell->cdr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>587</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6465912</pre></td>
    <td align="left" class="src coveredLine"><pre>      count ++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>588</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 5215496 times">&check;</span><span class="takenBranch" title="Branch 1 taken 1250416 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>6465912</pre></td>
    <td align="left" class="src coveredLine"><pre>    } while (count &lt; n);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>589</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1250416</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_heap_state.freelist = curr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>590</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1250416</pre></td>
    <td align="left" class="src coveredLine"><pre>    c_cell->cdr = ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>591</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1250416</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_heap_state.num_alloc+=count;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>592</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1250416</pre></td>
    <td align="left" class="src coveredLine"><pre>    return res;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>593</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>594</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return ENC_SYM_FATAL_ERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>595</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>596</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>597</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>624102</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_heap_allocate_list_init_va(unsigned int n, va_list valist) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>598</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 0 not taken">&cross;</span><span class="takenBranch" title="Branch 1 taken 624102 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>624102</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (n == 0) return ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>599</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 4210 times">&check;</span><span class="takenBranch" title="Branch 2 taken 619892 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>624102</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_heap_num_free() &lt; n) return ENC_SYM_MERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>600</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>601</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>619892</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value curr = lbm_heap_state.freelist;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>602</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>619892</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value res  = curr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>603</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 619892 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>619892</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_type_of(curr) == LBM_TYPE_CONS) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>604</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>605</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>619892</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_cons_t *c_cell = NULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>606</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>619892</pre></td>
    <td align="left" class="src coveredLine"><pre>    unsigned int count = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>607</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    do {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>608</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1524040</pre></td>
    <td align="left" class="src coveredLine"><pre>      c_cell = lbm_ref_cell(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>609</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1524040</pre></td>
    <td align="left" class="src coveredLine"><pre>      c_cell->car = va_arg(valist, lbm_value);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>610</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1524040</pre></td>
    <td align="left" class="src coveredLine"><pre>      curr = c_cell->cdr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>611</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1524040</pre></td>
    <td align="left" class="src coveredLine"><pre>      count ++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>612</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 904148 times">&check;</span><span class="takenBranch" title="Branch 1 taken 619892 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>1524040</pre></td>
    <td align="left" class="src coveredLine"><pre>    } while (count &lt; n);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>613</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>619892</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_heap_state.freelist = curr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>614</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>619892</pre></td>
    <td align="left" class="src coveredLine"><pre>    c_cell->cdr = ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>615</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>619892</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_heap_state.num_alloc+=count;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>616</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>619892</pre></td>
    <td align="left" class="src coveredLine"><pre>    return res;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>617</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>618</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return ENC_SYM_FATAL_ERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>619</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>620</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>621</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>622310</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_heap_allocate_list_init(unsigned int n, ...) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>622</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    va_list valist;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>623</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>622310</pre></td>
    <td align="left" class="src coveredLine"><pre>    va_start(valist, n);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>624</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>622310</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_value r = lbm_heap_allocate_list_init_va(n, valist);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>625</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>622310</pre></td>
    <td align="left" class="src coveredLine"><pre>    va_end(valist);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>626</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>622310</pre></td>
    <td align="left" class="src coveredLine"><pre>    return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>627</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>628</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>629</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>lbm_uint lbm_heap_num_allocated(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>630</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return lbm_heap_state.num_alloc;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>631</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>632</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>lbm_uint lbm_heap_size(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>633</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return lbm_heap_state.heap_size;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>634</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>635</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>636</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>lbm_uint lbm_heap_size_bytes(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>637</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return lbm_heap_state.heap_bytes;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>638</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>639</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>640</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>252</pre></td>
    <td align="left" class="src coveredLine"><pre>void lbm_get_heap_state(lbm_heap_state_t *res) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>641</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>252</pre></td>
    <td align="left" class="src coveredLine"><pre>  *res = lbm_heap_state;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>642</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>252</pre></td>
    <td align="left" class="src coveredLine"><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>643</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>644</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>lbm_uint lbm_get_gc_stack_max(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>645</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return lbm_get_max_stack(&amp;lbm_heap_state.gc_stack);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>646</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>647</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>648</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>lbm_uint lbm_get_gc_stack_size(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>649</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return lbm_heap_state.gc_stack.size;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>650</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>651</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>652</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#ifdef USE_GC_PTR_REV</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>653</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>/* ************************************************************</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>654</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   Deutch-Schorr-Waite (DSW) pointer reversal GC for 2-ptr cells</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>655</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   with a hack-solution for the lisp-array case (n-ptr cells).</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>656</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>657</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   DSW visits each branch node 3 times compared to 2 times for</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>658</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   the stack based recursive mark.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>659</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   Where the stack based recursive mark performs a stack push/pop,</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>660</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   DSW rearranges the, current, prev, next and a ptr field on</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>661</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   the heap.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>662</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>663</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   DSW changes the structure of the heap and it introduces an</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>664</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   invalid pointer (LBM_PTR_NULL) temporarily during marking.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>665</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   Since the heap will be "messed up" while marking, a mutex</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>666</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   is introuded to keep other processes out of the heap while</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>667</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   marking.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>668</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>669</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   TODO: See if the extra index field in arrays can be used</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>670</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   to mark arrays without resorting to recursive mark calls.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>671</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>*/</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>672</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>673</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>static inline void value_assign(lbm_value *a, lbm_value b) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>674</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_value a_old = *a &amp; LBM_GC_MASK;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>675</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  *a = a_old | (b &amp; ~LBM_GC_MASK);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>676</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>677</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>678</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>void lbm_gc_mark_phase_nm(lbm_value root) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>679</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  bool work_to_do = true;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>680</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  if (!lbm_is_ptr(root)) return;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>681</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>682</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_value curr = root;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>683</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_value prev = lbm_enc_cons_ptr(LBM_PTR_NULL);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>684</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>685</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  while (work_to_do) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>686</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    // follow leftwards pointers</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>687</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    while (lbm_is_ptr(curr) &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>688</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>           (lbm_dec_ptr(curr) != LBM_PTR_NULL) &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>689</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>           ((curr &amp; LBM_PTR_TO_CONSTANT_BIT) == 0) &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>690</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>           !lbm_get_gc_mark(lbm_cdr(curr))) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>691</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // Mark the cell if not a constant cell</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>692</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      lbm_cons_t *cell = lbm_ref_cell(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>693</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      cell->cdr = lbm_set_gc_mark(cell->cdr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>694</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      if (lbm_is_cons_rw(curr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>695</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        lbm_value next = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>696</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        value_assign(&amp;next, cell->car);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>697</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        value_assign(&amp;cell->car, prev);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>698</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        value_assign(&amp;prev,curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>699</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        value_assign(&amp;curr, next);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>700</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      } else if (lbm_type_of(curr) == LBM_TYPE_LISPARRAY) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>701</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        lbm_array_header_extended_t *arr = (lbm_array_header_extended_t*)cell->car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>702</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        lbm_value *arr_data = (lbm_value *)arr->data;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>703</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        size_t  arr_size = (size_t)arr->size / sizeof(lbm_value);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>704</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        // C stack recursion as deep as there are nested arrays.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>705</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        // TODO: Try to do this without recursion on the C side.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>706</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        for (size_t i = 0; i &lt; arr_size; i ++) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>707</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>          lbm_gc_mark_phase_nm(arr_data[i]);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>708</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>709</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>710</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // Will jump out next iteration as gc mark is set in curr.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>711</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>712</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    while (lbm_is_ptr(prev) &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>713</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>           (lbm_dec_ptr(prev) != LBM_PTR_NULL) &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>714</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>           lbm_get_gc_flag(lbm_car(prev)) ) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>715</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // clear the flag</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>716</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      lbm_cons_t *cell = lbm_ref_cell(prev);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>717</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      cell->car = lbm_clr_gc_flag(cell->car);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>718</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      lbm_value next = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>719</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      value_assign(&amp;next, cell->cdr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>720</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      value_assign(&amp;cell->cdr, curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>721</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      value_assign(&amp;curr, prev);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>722</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      value_assign(&amp;prev, next);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>723</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>724</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    if (lbm_is_ptr(prev) &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>725</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        lbm_dec_ptr(prev) == LBM_PTR_NULL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>726</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      work_to_do = false;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>727</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    } else if (lbm_is_ptr(prev)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>728</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // set the flag</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>729</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      lbm_cons_t *cell = lbm_ref_cell(prev);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>730</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      cell->car = lbm_set_gc_flag(cell->car);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>731</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      lbm_value next = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>732</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      value_assign(&amp;next, cell->car);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>733</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      value_assign(&amp;cell->car, curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>734</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      value_assign(&amp;curr, cell->cdr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>735</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      value_assign(&amp;cell->cdr, next);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>736</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>737</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>738</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>739</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>740</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>void lbm_gc_mark_phase(lbm_value root) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>741</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    mutex_lock(&amp;lbm_const_heap_mutex);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>742</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    lbm_gc_mark_phase_nm(root);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>743</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    mutex_unlock(&amp;lbm_const_heap_mutex);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>744</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>745</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>746</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#else</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>747</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>/* ************************************************************</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>748</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   Explicit stack "recursive" mark phase</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>749</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>750</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   Trees are marked in a left subtree before rigth subtree, car first then cdr,</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>751</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   way to favor lisp lists. This means that stack will grow slowly when</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>752</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   marking right-leaning (cdr-recursive) data-structures while left-leaning</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>753</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   (car-recursive) structures uses a lot of stack.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>754</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>755</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   Lisp arrays contain an extra book-keeping field to keep track</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>756</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   of how far into the array the marking process has gone.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>757</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>758</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   TODO: DSW should be used as a last-resort if the GC stack is exhausted.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>759</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>         If we use DSW as last-resort can we get away with a way smaller</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>760</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>         GC stack and unchanged performance (on sensible programs)?</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>761</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>*/</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>762</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>763</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>extern eval_context_t *ctx_running;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>764</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4813291</pre></td>
    <td align="left" class="src coveredLine"><pre>void lbm_gc_mark_phase(lbm_value root) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>765</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_value t_ptr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>766</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4813291</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_stack_t *s = &amp;lbm_heap_state.gc_stack;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>767</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4813291</pre></td>
    <td align="left" class="src coveredLine"><pre>  s->data[s->sp++] = root;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>768</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>769</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 23520885 times">&check;</span><span class="takenBranch" title="Branch 2 taken 4813291 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>28334176</pre></td>
    <td align="left" class="src coveredLine"><pre>  while (!lbm_stack_is_empty(s)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>770</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    lbm_value curr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>771</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>23520885</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_pop(s, &amp;curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>772</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>773</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>53624146</pre></td>
    <td align="left" class="src coveredLine"><pre>  mark_shortcut:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>774</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>775</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 32520712 times">&check;</span><span class="takenBranch" title="Branch 2 taken 21103434 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>53624146</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (!lbm_is_ptr(curr) ||</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>776</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 0 not taken">&cross;</span><span class="takenBranch" title="Branch 1 taken 32520712 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>32520712</pre></td>
    <td align="left" class="src coveredLine"><pre>        (curr &amp; LBM_PTR_TO_CONSTANT_BIT)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>777</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>23061271</pre></td>
    <td align="left" class="src coveredLine"><pre>      continue;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>778</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>779</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>780</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>32520712</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_cons_t *cell = &amp;lbm_heap_state.heap[lbm_dec_ptr(curr)];</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>781</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>782</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 1941205 times">&check;</span><span class="takenBranch" title="Branch 2 taken 30579507 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>32520712</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (lbm_get_gc_mark(cell->cdr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>783</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1941205</pre></td>
    <td align="left" class="src coveredLine"><pre>      continue;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>784</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>785</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>786</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>30579507</pre></td>
    <td align="left" class="src coveredLine"><pre>    t_ptr = lbm_type_of(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>787</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>788</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    // An array is marked in O(N) time using an additional 32bit</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>789</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    // value per array that keeps track of how far into the array GC</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>790</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    // has progressed.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>791</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 18172 times">&check;</span><span class="takenBranch" title="Branch 1 taken 30561335 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>30579507</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (t_ptr == LBM_TYPE_LISPARRAY) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>792</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>18172</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_push(s, curr); // put array back as bookkeeping.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>793</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>18172</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_array_header_extended_t *arr = (lbm_array_header_extended_t*)cell->car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>794</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>18172</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_value *arrdata = (lbm_value *)arr->data;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>795</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>18172</pre></td>
    <td align="left" class="src coveredLine"><pre>      uint32_t index = arr->index;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>796</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>797</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // Potential optimization.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>798</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // 1. CONS pointers are set to curr and recurse.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>799</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // 2. Any other ptr is marked immediately and index is increased.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>800</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 9212 times">&check;</span><span class="takenBranch" title="Branch 2 taken 8960 times">&check;</span><span class="takenBranch" title="Branch 3 taken 9212 times">&check;</span><span class="notTakenBranch" title="Branch 4 not taken">&cross;</span><br/></td>
    <td align="right" class="linecount coveredLine"><pre>18172</pre></td>
    <td align="left" class="src coveredLine"><pre>      if (lbm_is_ptr(arrdata[index]) &amp;&amp; ((arrdata[index] &amp; LBM_PTR_TO_CONSTANT_BIT) == 0) &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>801</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 4508 times">&check;</span><span class="takenBranch" title="Branch 1 taken 4704 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>9212</pre></td>
    <td align="left" class="src coveredLine"><pre>          !((arrdata[index] &amp; LBM_CONTINUATION_INTERNAL) == LBM_CONTINUATION_INTERNAL)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>802</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4508</pre></td>
    <td align="left" class="src coveredLine"><pre>        lbm_cons_t *elt = &amp;lbm_heap_state.heap[lbm_dec_ptr(arrdata[index])];</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>803</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 1540 times">&check;</span><span class="takenBranch" title="Branch 2 taken 2968 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>4508</pre></td>
    <td align="left" class="src coveredLine"><pre>        if (!lbm_get_gc_mark(elt->cdr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>804</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1540</pre></td>
    <td align="left" class="src coveredLine"><pre>          curr = arrdata[index];</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>805</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1540</pre></td>
    <td align="left" class="src coveredLine"><pre>          goto mark_shortcut;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>806</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>807</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>808</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 15764 times">&check;</span><span class="takenBranch" title="Branch 1 taken 868 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>16632</pre></td>
    <td align="left" class="src coveredLine"><pre>      if (index &lt; ((arr->size/(sizeof(lbm_value))) - 1)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>809</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>15764</pre></td>
    <td align="left" class="src coveredLine"><pre>        arr->index++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>810</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>15764</pre></td>
    <td align="left" class="src coveredLine"><pre>        continue;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>811</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>812</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>813</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>868</pre></td>
    <td align="left" class="src coveredLine"><pre>      arr->index = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>814</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>868</pre></td>
    <td align="left" class="src coveredLine"><pre>      cell->cdr = lbm_set_gc_mark(cell->cdr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>815</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>868</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_heap_state.gc_marked ++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>816</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>868</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_pop(s, &amp;curr); // Remove array from GC stack as we are done marking it.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>817</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>868</pre></td>
    <td align="left" class="src coveredLine"><pre>      continue;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>818</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 175028 times">&check;</span><span class="takenBranch" title="Branch 1 taken 30386307 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>30561335</pre></td>
    <td align="left" class="src coveredLine"><pre>    } else if (t_ptr == LBM_TYPE_CHANNEL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>819</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>175028</pre></td>
    <td align="left" class="src coveredLine"><pre>      cell->cdr = lbm_set_gc_mark(cell->cdr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>820</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>175028</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_heap_state.gc_marked ++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>821</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // TODO: Can channels be explicitly freed ?</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>822</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 175028 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>175028</pre></td>
    <td align="left" class="src coveredLine"><pre>      if (cell->car != ENC_SYM_NIL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>823</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>175028</pre></td>
    <td align="left" class="src coveredLine"><pre>        lbm_char_channel_t *chan = (lbm_char_channel_t *)cell->car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>824</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>175028</pre></td>
    <td align="left" class="src coveredLine"><pre>        curr = chan->dependency;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>825</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>175028</pre></td>
    <td align="left" class="src coveredLine"><pre>        goto mark_shortcut;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>826</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>827</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>      continue;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>828</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>829</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>830</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>30386307</pre></td>
    <td align="left" class="src coveredLine"><pre>    cell->cdr = lbm_set_gc_mark(cell->cdr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>831</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>30386307</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_heap_state.gc_marked ++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>832</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>833</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 29926693 times">&check;</span><span class="takenBranch" title="Branch 1 taken 459614 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>30386307</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (t_ptr == LBM_TYPE_CONS) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>834</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 18690290 times">&check;</span><span class="takenBranch" title="Branch 2 taken 11236403 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>29926693</pre></td>
    <td align="left" class="src coveredLine"><pre>      if (lbm_is_ptr(cell->cdr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>835</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span><span class="takenBranch" title="Branch 2 taken 18690290 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>18690290</pre></td>
    <td align="left" class="src coveredLine"><pre>        if (!lbm_push(s, cell->cdr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>836</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>          lbm_critical_error();</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>837</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>          break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>838</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>839</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>840</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>29926693</pre></td>
    <td align="left" class="src coveredLine"><pre>      curr = cell->car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>841</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>29926693</pre></td>
    <td align="left" class="src coveredLine"><pre>      goto mark_shortcut; // Skip a push/pop</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>842</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>843</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>844</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>4813291</pre></td>
    <td align="left" class="src coveredLine"><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>845</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>#endif</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>846</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>847</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>//Environments are proper lists with a 2 element list stored in each car.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>848</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>11494485</pre></td>
    <td align="left" class="src coveredLine"><pre>void lbm_gc_mark_env(lbm_value env) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>849</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>11494485</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value curr = env;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>850</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  lbm_cons_t *c;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>851</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>852</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 1624914 times">&check;</span><span class="takenBranch" title="Branch 2 taken 11494485 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>13119399</pre></td>
    <td align="left" class="src coveredLine"><pre>  while (lbm_is_ptr(curr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>853</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1624914</pre></td>
    <td align="left" class="src coveredLine"><pre>    c = lbm_ref_cell(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>854</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1624914</pre></td>
    <td align="left" class="src coveredLine"><pre>    c->cdr = lbm_set_gc_mark(c->cdr); // mark the environent list structure.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>855</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1624914</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_cons_t *b = lbm_ref_cell(c->car);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>856</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1624914</pre></td>
    <td align="left" class="src coveredLine"><pre>    b->cdr = lbm_set_gc_mark(b->cdr); // mark the binding list head cell.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>857</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1624914</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_gc_mark_phase(b->cdr);        // mark the bound object.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>858</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1624914</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_heap_state.gc_marked +=2;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>859</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1624914</pre></td>
    <td align="left" class="src coveredLine"><pre>    curr = c->cdr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>860</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>861</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>11494485</pre></td>
    <td align="left" class="src coveredLine"><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>862</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>863</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>864</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>361077</pre></td>
    <td align="left" class="src coveredLine"><pre>void lbm_gc_mark_aux(lbm_uint *aux_data, lbm_uint aux_size) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>865</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 6122608 times">&check;</span><span class="takenBranch" title="Branch 1 taken 361077 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>6483685</pre></td>
    <td align="left" class="src coveredLine"><pre>  for (lbm_uint i = 0; i &lt; aux_size; i ++) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>866</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 3703092 times">&check;</span><span class="takenBranch" title="Branch 2 taken 2419516 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>6122608</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (lbm_is_ptr(aux_data[i])) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>867</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3703092</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_type pt_t = lbm_type_of(aux_data[i]);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>868</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3703092</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_uint pt_v = lbm_dec_ptr(aux_data[i]);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>869</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 3703092 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span><span class="takenBranch" title="Branch 2 taken 1824382 times">&check;</span><span class="takenBranch" title="Branch 3 taken 1878710 times">&check;</span><br/></td>
    <td align="right" class="linecount coveredLine"><pre>3703092</pre></td>
    <td align="left" class="src coveredLine"><pre>      if( pt_t >= LBM_POINTER_TYPE_FIRST &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>870</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1824382</pre></td>
    <td align="left" class="src coveredLine"><pre>          pt_t &lt;= LBM_POINTER_TYPE_LAST &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>871</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 1824382 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>1824382</pre></td>
    <td align="left" class="src coveredLine"><pre>          pt_v &lt; lbm_heap_state.heap_size) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>872</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1824382</pre></td>
    <td align="left" class="src coveredLine"><pre>        lbm_gc_mark_phase(aux_data[i]);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>873</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>874</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>875</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>876</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>361077</pre></td>
    <td align="left" class="src coveredLine"><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>877</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>878</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>723318</pre></td>
    <td align="left" class="src coveredLine"><pre>void lbm_gc_mark_roots(lbm_uint *roots, lbm_uint num_roots) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>879</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 1088195 times">&check;</span><span class="takenBranch" title="Branch 1 taken 723318 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>1811513</pre></td>
    <td align="left" class="src coveredLine"><pre>  for (lbm_uint i = 0; i &lt; num_roots; i ++) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>880</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1088195</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_gc_mark_phase(roots[i]);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>881</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>882</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>723318</pre></td>
    <td align="left" class="src coveredLine"><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>883</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>884</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// Sweep moves non-marked heap objects to the free list.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>885</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>int lbm_gc_sweep_phase(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>886</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>  unsigned int i = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>887</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_cons_t *heap = (lbm_cons_t *)lbm_heap_state.heap;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>888</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>889</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 772202496 times">&check;</span><span class="takenBranch" title="Branch 1 taken 347919 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>772550415</pre></td>
    <td align="left" class="src coveredLine"><pre>  for (i = 0; i &lt; lbm_heap_state.heap_size; i ++) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>890</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 33645801 times">&check;</span><span class="takenBranch" title="Branch 2 taken 738556695 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>772202496</pre></td>
    <td align="left" class="src coveredLine"><pre>    if ( lbm_get_gc_mark(heap[i].cdr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>891</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>33645801</pre></td>
    <td align="left" class="src coveredLine"><pre>      heap[i].cdr = lbm_clr_gc_mark(heap[i].cdr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>892</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    } else {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>893</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // Check if this cell is a pointer to an array</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>894</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // and free it.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>895</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 686373175 times">&check;</span><span class="takenBranch" title="Branch 2 taken 52183520 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>738556695</pre></td>
    <td align="left" class="src coveredLine"><pre>      if (lbm_type_of(heap[i].cdr) == LBM_TYPE_SYMBOL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>896</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 8369376 times">&check;</span><span class="takenBranch" title="Branch 1 taken 1036 times">&check;</span><span class="takenBranch" title="Branch 2 taken 294678 times">&check;</span><span class="takenBranch" title="Branch 3 taken 303696 times">&check;</span><br/><span class="notTakenBranch" title="Branch 4 not taken">&cross;</span><span class="takenBranch" title="Branch 5 taken 28 times">&check;</span><span class="takenBranch" title="Branch 6 taken 43214706 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>52183520</pre></td>
    <td align="left" class="src coveredLine"><pre>        switch(heap[i].cdr) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>897</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>898</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8369376</pre></td>
    <td align="left" class="src coveredLine"><pre>        case ENC_SYM_IND_I_TYPE: /* fall through */</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>899</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        case ENC_SYM_IND_U_TYPE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>900</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        case ENC_SYM_IND_F_TYPE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>901</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8369376</pre></td>
    <td align="left" class="src coveredLine"><pre>          lbm_memory_free((lbm_uint*)heap[i].car);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>902</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8369376</pre></td>
    <td align="left" class="src coveredLine"><pre>          break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>903</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1036</pre></td>
    <td align="left" class="src coveredLine"><pre>        case ENC_SYM_DEFRAG_ARRAY_TYPE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>904</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1036</pre></td>
    <td align="left" class="src coveredLine"><pre>          lbm_defrag_mem_free((lbm_uint*)heap[i].car);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>905</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1036</pre></td>
    <td align="left" class="src coveredLine"><pre>          break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>906</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>294678</pre></td>
    <td align="left" class="src coveredLine"><pre>        case ENC_SYM_LISPARRAY_TYPE: /* fall through */</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>907</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        case ENC_SYM_ARRAY_TYPE:{</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>908</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>294678</pre></td>
    <td align="left" class="src coveredLine"><pre>          lbm_array_header_t *arr = (lbm_array_header_t*)heap[i].car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>909</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>294678</pre></td>
    <td align="left" class="src coveredLine"><pre>          lbm_memory_free((lbm_uint *)arr->data);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>910</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>294678</pre></td>
    <td align="left" class="src coveredLine"><pre>          lbm_heap_state.gc_recovered_arrays++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>911</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>294678</pre></td>
    <td align="left" class="src coveredLine"><pre>          lbm_memory_free((lbm_uint *)arr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>912</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>294678</pre></td>
    <td align="left" class="src coveredLine"><pre>        } break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>913</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>303696</pre></td>
    <td align="left" class="src coveredLine"><pre>        case ENC_SYM_CHANNEL_TYPE:{</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>914</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>303696</pre></td>
    <td align="left" class="src coveredLine"><pre>          lbm_char_channel_t *chan = (lbm_char_channel_t*)heap[i].car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>915</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>303696</pre></td>
    <td align="left" class="src coveredLine"><pre>          lbm_memory_free((lbm_uint*)chan->state);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>916</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>303696</pre></td>
    <td align="left" class="src coveredLine"><pre>          lbm_memory_free((lbm_uint*)chan);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>917</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>303696</pre></td>
    <td align="left" class="src coveredLine"><pre>        } break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>918</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>        case ENC_SYM_CUSTOM_TYPE: {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>919</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>          lbm_uint *t = (lbm_uint*)heap[i].car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>920</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>          lbm_custom_type_destroy(t);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>921</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>          lbm_memory_free(t);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>922</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>          } break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>923</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>        case ENC_SYM_DEFRAG_MEM_TYPE: {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>924</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>          lbm_uint *ptr = (lbm_uint *)heap[i].car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>925</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>          lbm_defrag_mem_destroy(ptr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>926</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>          } break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>927</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>43214706</pre></td>
    <td align="left" class="src coveredLine"><pre>        default:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>928</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>43214706</pre></td>
    <td align="left" class="src coveredLine"><pre>          break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>929</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>        }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>930</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>686373175</pre></td>
    <td align="left" class="src coveredLine"><pre>      }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>931</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // create pointer to use as new freelist</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>932</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>738556695</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_uint addr = lbm_enc_cons_ptr(i);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>933</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>934</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>      // Clear the "freed" cell.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>935</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>738556695</pre></td>
    <td align="left" class="src coveredLine"><pre>      heap[i].car = ENC_SYM_RECOVERED;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>936</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>738556695</pre></td>
    <td align="left" class="src coveredLine"><pre>      heap[i].cdr = lbm_heap_state.freelist;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>937</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>738556695</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_heap_state.freelist = addr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>938</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>738556695</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_heap_state.num_alloc --;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>939</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>738556695</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_heap_state.gc_recovered ++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>940</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>941</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>942</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>  return 1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>943</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>944</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>945</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>void lbm_gc_state_inc(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>946</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.gc_num ++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>947</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.gc_recovered = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>948</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.gc_marked = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>949</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>347919</pre></td>
    <td align="left" class="src coveredLine"><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>950</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>951</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// construct, alter and break apart</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>952</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>364713222</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_cons(lbm_value car, lbm_value cdr) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>953</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>364713222</pre></td>
    <td align="left" class="src coveredLine"><pre>  return lbm_heap_allocate_cell(LBM_TYPE_CONS, car, cdr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>954</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>955</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>956</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>245608648</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_car(lbm_value c){</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>957</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>958</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 245608480 times">&check;</span><span class="takenBranch" title="Branch 2 taken 168 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>245608648</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_ptr(c) ){</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>959</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>245608480</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_cons_t *cell = lbm_ref_cell(c);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>960</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>245608480</pre></td>
    <td align="left" class="src coveredLine"><pre>    return cell->car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>961</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>962</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>963</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 168 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_symbol_nil(c)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>964</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>    return c; // if nil, return nil.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>965</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>966</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>967</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return ENC_SYM_TERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>968</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>969</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>970</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// TODO: Many comparisons "is this the nil symbol" can be</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>971</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// streamlined a bit. NIL is 0 and cannot be confused with any other</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>972</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// lbm_value.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>973</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>974</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>68</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_caar(lbm_value c) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>975</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 68 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>68</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_ptr(c)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>976</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>68</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_value tmp = lbm_ref_cell(c)->car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>977</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>978</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 68 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>68</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (lbm_is_ptr(tmp)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>979</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>68</pre></td>
    <td align="left" class="src coveredLine"><pre>      return lbm_ref_cell(tmp)->car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>980</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    } else if (lbm_is_symbol_nil(tmp)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>981</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>      return tmp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>982</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>983</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  } else if (lbm_is_symbol_nil(c)){</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>984</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    return c;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>985</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>986</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return ENC_SYM_TERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>987</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>988</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>989</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>990</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>11620</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_cadr(lbm_value c) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>991</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 11620 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>11620</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_ptr(c)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>992</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>11620</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_value tmp = lbm_ref_cell(c)->cdr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>993</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>994</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 11620 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>11620</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (lbm_is_ptr(tmp)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>995</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>11620</pre></td>
    <td align="left" class="src coveredLine"><pre>      return lbm_ref_cell(tmp)->car;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>996</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    } else if (lbm_is_symbol_nil(tmp)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>997</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>      return tmp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>998</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>999</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  } else if (lbm_is_symbol_nil(c)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1000</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    return c;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1001</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1002</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return ENC_SYM_TERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1003</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1004</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1005</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112306452</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_cdr(lbm_value c){</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1006</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 111739844 times">&check;</span><span class="takenBranch" title="Branch 2 taken 566608 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>112306452</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_ptr(c)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1007</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>111739844</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_cons_t *cell = lbm_ref_cell(c);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1008</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>111739844</pre></td>
    <td align="left" class="src coveredLine"><pre>    return cell->cdr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1009</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1010</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 566608 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>566608</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_symbol_nil(c)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1011</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>566608</pre></td>
    <td align="left" class="src coveredLine"><pre>    return ENC_SYM_NIL; // if nil, return nil.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1012</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1013</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return ENC_SYM_TERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1014</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1015</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1016</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>lbm_value lbm_cddr(lbm_value c) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1017</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  if (lbm_is_ptr(c)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1018</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    lbm_value tmp = lbm_ref_cell(c)->cdr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1019</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    if (lbm_is_ptr(tmp)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1020</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>      return lbm_ref_cell(tmp)->cdr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1021</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1022</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1023</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  if (lbm_is_symbol_nil(c)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1024</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    return ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1025</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1026</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return ENC_SYM_TERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1027</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1028</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1029</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6513330</pre></td>
    <td align="left" class="src coveredLine"><pre>int lbm_set_car(lbm_value c, lbm_value v) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1030</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6513330</pre></td>
    <td align="left" class="src coveredLine"><pre>  int r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1031</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1032</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 6513302 times">&check;</span><span class="takenBranch" title="Branch 2 taken 28 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>6513330</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_type_of(c) == LBM_TYPE_CONS) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1033</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6513302</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_cons_t *cell = lbm_ref_cell(c);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1034</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6513302</pre></td>
    <td align="left" class="src coveredLine"><pre>    cell->car = v;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1035</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6513302</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = 1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1036</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1037</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>6513330</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1038</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1039</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1040</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>99150604</pre></td>
    <td align="left" class="src coveredLine"><pre>int lbm_set_cdr(lbm_value c, lbm_value v) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1041</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>99150604</pre></td>
    <td align="left" class="src coveredLine"><pre>  int r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1042</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 98584080 times">&check;</span><span class="takenBranch" title="Branch 2 taken 566524 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>99150604</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_cons_rw(c)){</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1043</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>98584080</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_cons_t *cell = lbm_ref_cell(c);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1044</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>98584080</pre></td>
    <td align="left" class="src coveredLine"><pre>    cell->cdr = v;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1045</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>98584080</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = 1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1046</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1047</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>99150604</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1048</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1049</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1050</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8431652</pre></td>
    <td align="left" class="src coveredLine"><pre>int lbm_set_car_and_cdr(lbm_value c, lbm_value car_val, lbm_value cdr_val) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1051</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8431652</pre></td>
    <td align="left" class="src coveredLine"><pre>  int r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1052</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 8431652 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>8431652</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_cons_rw(c)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1053</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8431652</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_cons_t *cell = lbm_ref_cell(c);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1054</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8431652</pre></td>
    <td align="left" class="src coveredLine"><pre>    cell->car = car_val;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1055</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8431652</pre></td>
    <td align="left" class="src coveredLine"><pre>    cell->cdr = cdr_val;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1056</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8431652</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = 1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1057</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1058</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>8431652</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1059</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1060</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1061</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>/* calculate length of a proper list */</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1062</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1248496</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_uint lbm_list_length(lbm_value c) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1063</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1248496</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint len = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1064</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1065</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 5962310 times">&check;</span><span class="takenBranch" title="Branch 2 taken 1248496 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>7210806</pre></td>
    <td align="left" class="src coveredLine"><pre>  while (lbm_is_cons(c)){</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1066</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>5962310</pre></td>
    <td align="left" class="src coveredLine"><pre>    len ++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1067</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>5962310</pre></td>
    <td align="left" class="src coveredLine"><pre>    c = lbm_cdr(c);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1068</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1069</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>1248496</pre></td>
    <td align="left" class="src coveredLine"><pre>  return len;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1070</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1071</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1072</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>/* calculate the length of a list and check that each element</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1073</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   fullfills the predicate pred */</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1074</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>unsigned int lbm_list_length_pred(lbm_value c, bool *pres, bool (*pred)(lbm_value)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1075</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  bool res = true;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1076</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  unsigned int len = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1077</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1078</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 756 times">&check;</span><span class="takenBranch" title="Branch 2 taken 168 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>924</pre></td>
    <td align="left" class="src coveredLine"><pre>  while (lbm_is_cons(c)){</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1079</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>756</pre></td>
    <td align="left" class="src coveredLine"><pre>    len ++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1080</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 756 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span><span class="takenBranch" title="Branch 4 taken 756 times">&check;</span><span class="notTakenBranch" title="Branch 5 not taken">&cross;</span><br/></td>
    <td align="right" class="linecount coveredLine"><pre>756</pre></td>
    <td align="left" class="src coveredLine"><pre>    res = res &amp;&amp; pred(lbm_car(c));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1081</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>756</pre></td>
    <td align="left" class="src coveredLine"><pre>    c = lbm_cdr(c);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1082</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1083</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  *pres = res;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1084</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  return len;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1085</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1086</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1087</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>/* reverse a proper list */</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1088</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>lbm_value lbm_list_reverse(lbm_value list) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1089</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  if (lbm_type_of(list) == LBM_TYPE_SYMBOL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1090</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    return list;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1091</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1092</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1093</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  lbm_value curr = list;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1094</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1095</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  lbm_value new_list = ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1096</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  while (lbm_is_cons(curr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1097</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1098</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    new_list = lbm_cons(lbm_car(curr), new_list);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1099</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    if (lbm_type_of(new_list) == LBM_TYPE_SYMBOL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1100</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>      return ENC_SYM_MERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1101</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1102</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    curr = lbm_cdr(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1103</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1104</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return new_list;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1105</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1106</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1107</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_list_destructive_reverse(lbm_value list) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1108</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span><span class="takenBranch" title="Branch 2 taken 168 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_type_of(list) == LBM_TYPE_SYMBOL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1109</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    return list;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1110</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1111</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value curr = list;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1112</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value last_cell = ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1113</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1114</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 784 times">&check;</span><span class="takenBranch" title="Branch 2 taken 168 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>952</pre></td>
    <td align="left" class="src coveredLine"><pre>  while (lbm_is_cons_rw(curr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1115</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>784</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_value next = lbm_cdr(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1116</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>784</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_set_cdr(curr, last_cell);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1117</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>784</pre></td>
    <td align="left" class="src coveredLine"><pre>    last_cell = curr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1118</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>784</pre></td>
    <td align="left" class="src coveredLine"><pre>    curr = next;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1119</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1120</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>168</pre></td>
    <td align="left" class="src coveredLine"><pre>  return last_cell;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1121</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1122</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1123</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1124</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>330098</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_list_copy(int *m, lbm_value list) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1125</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>330098</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value curr = list;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1126</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>330098</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint n = lbm_list_length(list);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1127</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>330098</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint copy_n = n;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1128</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 6172 times">&check;</span><span class="takenBranch" title="Branch 1 taken 323926 times">&check;</span><span class="takenBranch" title="Branch 2 taken 5414 times">&check;</span><span class="takenBranch" title="Branch 3 taken 758 times">&check;</span><br/></td>
    <td align="right" class="linecount coveredLine"><pre>330098</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (*m >= 0 &amp;&amp; (lbm_uint)*m &lt; n) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1129</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>5414</pre></td>
    <td align="left" class="src coveredLine"><pre>    copy_n = (lbm_uint)*m;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1130</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 295540 times">&check;</span><span class="takenBranch" title="Branch 1 taken 29144 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>324684</pre></td>
    <td align="left" class="src coveredLine"><pre>  } else if (*m == -1) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1131</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>295540</pre></td>
    <td align="left" class="src coveredLine"><pre>    *m = (int)n; // TODO: smaller range in target variable.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1132</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1133</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 224 times">&check;</span><span class="takenBranch" title="Branch 1 taken 329874 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>330098</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (copy_n == 0) return ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1134</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>329874</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint new_list = lbm_heap_allocate_list(copy_n);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1135</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 588 times">&check;</span><span class="takenBranch" title="Branch 2 taken 329286 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>329874</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_symbol(new_list)) return new_list;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1136</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>329286</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value curr_targ = new_list;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1137</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1138</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 3765962 times">&check;</span><span class="takenBranch" title="Branch 2 taken 323946 times">&check;</span><span class="takenBranch" title="Branch 3 taken 3760622 times">&check;</span><span class="takenBranch" title="Branch 4 taken 5340 times">&check;</span><br/></td>
    <td align="right" class="linecount coveredLine"><pre>4089908</pre></td>
    <td align="left" class="src coveredLine"><pre>  while (lbm_is_cons(curr) &amp;&amp; copy_n > 0) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1139</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3760622</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_value v = lbm_car(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1140</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3760622</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_set_car(curr_targ, v);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1141</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3760622</pre></td>
    <td align="left" class="src coveredLine"><pre>    curr_targ = lbm_cdr(curr_targ);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1142</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3760622</pre></td>
    <td align="left" class="src coveredLine"><pre>    curr = lbm_cdr(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1143</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>3760622</pre></td>
    <td align="left" class="src coveredLine"><pre>    copy_n --;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1144</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1145</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1146</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>329286</pre></td>
    <td align="left" class="src coveredLine"><pre>  return new_list;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1147</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1148</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1149</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// Append for proper lists only</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1150</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// Destructive update of list1.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1151</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>23744</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_list_append(lbm_value list1, lbm_value list2) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1152</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1153</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 23744 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span><span class="takenBranch" title="Branch 3 taken 23744 times">&check;</span><span class="notTakenBranch" title="Branch 4 not taken">&cross;</span><br/></td>
    <td align="right" class="linecount coveredLine"><pre>47488</pre></td>
    <td align="left" class="src coveredLine"><pre>  if(lbm_is_list_rw(list1) &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1154</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>23744</pre></td>
    <td align="left" class="src coveredLine"><pre>     lbm_is_list(list2)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1155</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1156</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>23744</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_value curr = list1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1157</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 2 taken 31430 times">&check;</span><span class="takenBranch" title="Branch 3 taken 23744 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>55174</pre></td>
    <td align="left" class="src coveredLine"><pre>    while(lbm_type_of(lbm_cdr(curr)) == LBM_TYPE_CONS) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1158</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>31430</pre></td>
    <td align="left" class="src coveredLine"><pre>      curr = lbm_cdr(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1159</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1160</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 28 times">&check;</span><span class="takenBranch" title="Branch 2 taken 23716 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>23744</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (lbm_is_symbol_nil(curr)) return list2;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1161</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>23716</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_set_cdr(curr, list2);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1162</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>23716</pre></td>
    <td align="left" class="src coveredLine"><pre>    return list1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1163</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1164</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return ENC_SYM_EERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1165</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1166</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1167</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>84</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_list_drop(unsigned int n, lbm_value ls) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1168</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>84</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value curr = ls;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1169</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 728 times">&check;</span><span class="takenBranch" title="Branch 2 taken 56 times">&check;</span><span class="takenBranch" title="Branch 3 taken 700 times">&check;</span><span class="takenBranch" title="Branch 4 taken 28 times">&check;</span><br/></td>
    <td align="right" class="linecount coveredLine"><pre>784</pre></td>
    <td align="left" class="src coveredLine"><pre>  while (lbm_type_of_functional(curr) == LBM_TYPE_CONS &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1170</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>         n > 0) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1171</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>700</pre></td>
    <td align="left" class="src coveredLine"><pre>    curr = lbm_cdr(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1172</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>700</pre></td>
    <td align="left" class="src coveredLine"><pre>    n --;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1173</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1174</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>84</pre></td>
    <td align="left" class="src coveredLine"><pre>  return curr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1175</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1176</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1177</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>151068</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_value lbm_index_list(lbm_value l, int32_t n) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1178</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>151068</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value curr = l;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1179</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1180</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 112 times">&check;</span><span class="takenBranch" title="Branch 1 taken 150956 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>151068</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (n &lt; 0) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1181</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    int32_t len = (int32_t)lbm_list_length(l);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1182</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    n = len + n;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1183</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 0 not taken">&cross;</span><span class="takenBranch" title="Branch 1 taken 112 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (n &lt; 0) return ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1184</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1185</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1186</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 227442 times">&check;</span><span class="takenBranch" title="Branch 2 taken 28 times">&check;</span><span class="takenBranch" title="Branch 3 taken 76402 times">&check;</span><span class="takenBranch" title="Branch 4 taken 151040 times">&check;</span><br/></td>
    <td align="right" class="linecount coveredLine"><pre>227470</pre></td>
    <td align="left" class="src coveredLine"><pre>  while (lbm_is_cons(curr) &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1187</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>          n > 0) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1188</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>76402</pre></td>
    <td align="left" class="src coveredLine"><pre>    curr = lbm_cdr(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1189</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>76402</pre></td>
    <td align="left" class="src coveredLine"><pre>    n --;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1190</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1191</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 151040 times">&check;</span><span class="takenBranch" title="Branch 2 taken 28 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>151068</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_cons(curr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1192</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>151040</pre></td>
    <td align="left" class="src coveredLine"><pre>    return lbm_car(curr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1193</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  } else {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1194</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    return ENC_SYM_NIL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1195</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1196</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1197</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1198</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// High-level arrays are just bytearrays but with a different tag and pointer type.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1199</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// These arrays will be inspected by GC and the elements of the array will be marked.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1200</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1201</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// Arrays are part of the heap module because their lifespan is managed</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1202</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// by the garbage collector. The data in the array is not stored</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1203</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// in the "heap of cons cells".</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1204</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>296388</pre></td>
    <td align="left" class="src coveredLine"><pre>int lbm_heap_allocate_array_base(lbm_value *res, bool byte_array, lbm_uint size){</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1205</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1206</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>296388</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint tag = ENC_SYM_ARRAY_TYPE;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1207</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>296388</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint type = LBM_TYPE_ARRAY;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1208</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 952 times">&check;</span><span class="takenBranch" title="Branch 1 taken 295436 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>296388</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (!byte_array) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1209</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>952</pre></td>
    <td align="left" class="src coveredLine"><pre>      tag = ENC_SYM_LISPARRAY_TYPE;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1210</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>952</pre></td>
    <td align="left" class="src coveredLine"><pre>      type = LBM_TYPE_LISPARRAY;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1211</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>952</pre></td>
    <td align="left" class="src coveredLine"><pre>      size = sizeof(lbm_value) * size;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1212</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1213</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>296388</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_array_header_t *array = NULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1214</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 295436 times">&check;</span><span class="takenBranch" title="Branch 1 taken 952 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>296388</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (byte_array) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1215</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>295436</pre></td>
    <td align="left" class="src coveredLine"><pre>    array = (lbm_array_header_t*)lbm_malloc(sizeof(lbm_array_header_t));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1216</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  } else {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1217</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>952</pre></td>
    <td align="left" class="src coveredLine"><pre>    array = (lbm_array_header_t*)lbm_malloc(sizeof(lbm_array_header_extended_t));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1218</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1219</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1220</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 390 times">&check;</span><span class="takenBranch" title="Branch 1 taken 295998 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>296388</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (array == NULL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1221</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>390</pre></td>
    <td align="left" class="src coveredLine"><pre>    *res = ENC_SYM_MERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1222</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>390</pre></td>
    <td align="left" class="src coveredLine"><pre>    return 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1223</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1224</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>295998</pre></td>
    <td align="left" class="src coveredLine"><pre>  array->data = NULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1225</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 295914 times">&check;</span><span class="takenBranch" title="Branch 1 taken 84 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>295998</pre></td>
    <td align="left" class="src coveredLine"><pre>  if ( size > 0) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1226</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 952 times">&check;</span><span class="takenBranch" title="Branch 1 taken 294962 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>295914</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (!byte_array) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1227</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>952</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_array_header_extended_t *ext_array = (lbm_array_header_extended_t*)array;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1228</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>952</pre></td>
    <td align="left" class="src coveredLine"><pre>      ext_array->index = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1229</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1230</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1231</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>295914</pre></td>
    <td align="left" class="src coveredLine"><pre>    array->data = (lbm_uint*)lbm_malloc(size);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1232</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1233</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 5630 times">&check;</span><span class="takenBranch" title="Branch 1 taken 290284 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>295914</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (array->data == NULL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1234</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>5630</pre></td>
    <td align="left" class="src coveredLine"><pre>      lbm_memory_free((lbm_uint*)array);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1235</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>5630</pre></td>
    <td align="left" class="src coveredLine"><pre>      *res = ENC_SYM_MERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1236</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>5630</pre></td>
    <td align="left" class="src coveredLine"><pre>      return 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1237</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1238</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    // It is more important to zero out high-level arrays.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1239</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    // 0 is symbol NIL which is perfectly safe for the GC to inspect.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1240</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>290284</pre></td>
    <td align="left" class="src coveredLine"><pre>    memset(array->data, 0, size);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1241</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1242</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>290368</pre></td>
    <td align="left" class="src coveredLine"><pre>  array->size = size;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1243</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1244</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  // allocating a cell for array's heap-presence</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1245</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>290368</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_value cell = lbm_heap_allocate_cell(type, (lbm_uint) array, tag);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1246</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 88 times">&check;</span><span class="takenBranch" title="Branch 1 taken 290280 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>290368</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (cell == ENC_SYM_MERROR) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1247</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>88</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_memory_free((lbm_uint*)array->data);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1248</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>88</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_memory_free((lbm_uint*)array);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1249</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>88</pre></td>
    <td align="left" class="src coveredLine"><pre>    *res = ENC_SYM_MERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1250</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>88</pre></td>
    <td align="left" class="src coveredLine"><pre>    return 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1251</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1252</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>290280</pre></td>
    <td align="left" class="src coveredLine"><pre>  *res = cell;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1253</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1254</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>290280</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heap_state.num_alloc_arrays ++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1255</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1256</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>290280</pre></td>
    <td align="left" class="src coveredLine"><pre>  return 1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1257</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1258</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1259</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>295436</pre></td>
    <td align="left" class="src coveredLine"><pre>int lbm_heap_allocate_array(lbm_value *res, lbm_uint size){</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1260</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>295436</pre></td>
    <td align="left" class="src coveredLine"><pre>  return lbm_heap_allocate_array_base(res, true, size);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1261</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1262</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1263</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>952</pre></td>
    <td align="left" class="src coveredLine"><pre>int lbm_heap_allocate_lisp_array(lbm_value *res, lbm_uint size) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1264</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>952</pre></td>
    <td align="left" class="src coveredLine"><pre>  return lbm_heap_allocate_array_base(res, false, size);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1265</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1266</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1267</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// Convert a C array into an lbm_array.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1268</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>// if the array is in LBM_MEMORY, the lifetime will be managed by the GC after lifting.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1269</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>int lbm_lift_array(lbm_value *value, char *data, lbm_uint num_elt) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1270</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1271</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  lbm_array_header_t *array = NULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1272</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  lbm_value cell = lbm_heap_allocate_cell(LBM_TYPE_CONS, ENC_SYM_NIL, ENC_SYM_ARRAY_TYPE);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1273</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1274</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  if (cell == ENC_SYM_MERROR) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1275</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    *value = cell;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1276</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    return 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1277</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1278</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1279</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  array = (lbm_array_header_t*)lbm_malloc(sizeof(lbm_array_header_t));</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1280</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1281</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  if (array == NULL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1282</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    lbm_set_car_and_cdr(cell, ENC_SYM_NIL, ENC_SYM_NIL);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1283</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    *value = ENC_SYM_MERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1284</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    return 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1285</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1286</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1287</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  array->data = (lbm_uint*)data;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1288</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  array->size = num_elt;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1289</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1290</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  lbm_set_car(cell, (lbm_uint)array);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1291</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1292</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  cell = lbm_set_ptr_type(cell, LBM_TYPE_ARRAY);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1293</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  *value = cell;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1294</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return 1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1295</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1296</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1297</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>237384</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_int lbm_heap_array_get_size(lbm_value arr) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1298</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1299</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>237384</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_int r = -1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1300</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 237384 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>237384</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_array_r(arr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1301</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>237384</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_array_header_t *header = (lbm_array_header_t*)lbm_car(arr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1302</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 0 not taken">&cross;</span><span class="takenBranch" title="Branch 1 taken 237384 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>237384</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (header == NULL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1303</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>      return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1304</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1305</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>237384</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (lbm_int)header->size;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1306</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1307</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>237384</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1308</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1309</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1310</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>118692</pre></td>
    <td align="left" class="src coveredLine"><pre>const uint8_t *lbm_heap_array_get_data_ro(lbm_value arr) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1311</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>118692</pre></td>
    <td align="left" class="src coveredLine"><pre>  uint8_t *r = NULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1312</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 118692 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>118692</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_array_r(arr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1313</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>118692</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_array_header_t *header = (lbm_array_header_t*)lbm_car(arr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1314</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>118692</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = (uint8_t*)header->data;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1315</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1316</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>118692</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1317</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1318</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1319</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>uint8_t *lbm_heap_array_get_data_rw(lbm_value arr) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1320</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  uint8_t *r = NULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1321</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  if (lbm_is_array_rw(arr)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1322</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    lbm_array_header_t *header = (lbm_array_header_t*)lbm_car(arr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1323</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    r = (uint8_t*)header->data;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1324</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1325</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1326</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1327</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1328</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1329</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>/* Explicitly freeing an array.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1330</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1331</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   This is a highly unsafe operation and can only be safely</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1332</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   used if the heap cell that points to the array has not been made</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1333</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   accessible to the program.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1334</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1335</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   So This function can be used to free an array in case an array</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1336</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   is being constructed and some error case appears while doing so</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1337</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   If the array still have not become available it can safely be</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1338</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   "explicitly" freed.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1339</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1340</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   The problem is that if the "array" heap-cell is made available to</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1341</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   the program, this cell can easily be duplicated and we would have</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1342</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   to search the entire heap to find all cells pointing to the array</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1343</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>   memory in question and "null"-them out before freeing the memory</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1344</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>*/</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1345</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1346</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>int lbm_heap_explicit_free_array(lbm_value arr) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1347</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1348</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>  int r = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1349</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 112 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span><span class="takenBranch" title="Branch 4 taken 112 times">&check;</span><span class="notTakenBranch" title="Branch 5 not taken">&cross;</span><br/></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_is_array_rw(arr) &amp;&amp; lbm_cdr(arr) == ENC_SYM_ARRAY_TYPE) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1350</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_array_header_t *header = (lbm_array_header_t*)lbm_car(arr);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1351</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 0 not taken">&cross;</span><span class="takenBranch" title="Branch 1 taken 112 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (header == NULL) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1352</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>      return 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1353</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1354</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_memory_free((lbm_uint*)header->data);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1355</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_memory_free((lbm_uint*)header);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1356</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1357</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    arr = lbm_set_ptr_type(arr, LBM_TYPE_CONS);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1358</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_set_car(arr, ENC_SYM_NIL);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1359</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_set_cdr(arr, ENC_SYM_NIL);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1360</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = 1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1361</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1362</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1363</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>112</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1364</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1365</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1366</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>lbm_uint lbm_size_of(lbm_type t) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1367</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  lbm_uint s = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1368</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  switch(t) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1369</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_BYTE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1370</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    s = 1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1371</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1372</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_I: /* fall through */</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1373</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  case LBM_TYPE_U:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1374</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  case LBM_TYPE_SYMBOL:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1375</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    s = sizeof(lbm_uint);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1376</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1377</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_I32: /* fall through */</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1378</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  case LBM_TYPE_U32:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1379</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  case LBM_TYPE_FLOAT:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1380</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    s = 4;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1381</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1382</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  case LBM_TYPE_I64: /* fall through */</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1383</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  case LBM_TYPE_U64:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1384</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  case LBM_TYPE_DOUBLE:</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1385</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    s = 8;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1386</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    break;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1387</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1388</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return s;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1389</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1390</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1391</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>static bool dummy_flash_write(lbm_uint ix, lbm_uint val) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1392</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  (void)ix;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1393</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  (void)val;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1394</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return false;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1395</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1396</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1397</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>static const_heap_write_fun const_heap_write = dummy_flash_write;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1398</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1399</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>int lbm_const_heap_init(const_heap_write_fun w_fun,</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1400</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>                        lbm_const_heap_t *heap,</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1401</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>                        lbm_uint *addr,</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1402</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>                        lbm_uint  num_words) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1403</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 0 not taken">&cross;</span><span class="takenBranch" title="Branch 1 taken 21672 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (((uintptr_t)addr % 4) != 0) return 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1404</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 0 not taken">&cross;</span><span class="takenBranch" title="Branch 1 taken 21672 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  if ((num_words % 2) != 0) return 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1405</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1406</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 21672 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (!lbm_const_heap_mutex_initialized) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1407</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>    mutex_init(&amp;lbm_const_heap_mutex);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1408</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_const_heap_mutex_initialized = true;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1409</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1410</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1411</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 21672 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (!lbm_mark_mutex_initialized) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1412</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>    mutex_init(&amp;lbm_mark_mutex);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1413</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_mark_mutex_initialized = true;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1414</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1415</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1416</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  const_heap_write = w_fun;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1417</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1418</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  heap->heap = addr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1419</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  heap->size = num_words;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1420</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  heap->next = 0;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1421</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1422</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_const_heap_state = heap;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1423</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  // ref_cell views the lbm_uint array as an lbm_cons_t array</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1424</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_heaps[1] = (lbm_cons_t*)addr;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1425</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>21672</pre></td>
    <td align="left" class="src coveredLine"><pre>  return 1;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1426</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1427</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1428</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_flash_status lbm_allocate_const_cell(lbm_value *res) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1429</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_flash_status r = LBM_FLASH_FULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1430</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1431</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>  mutex_lock(&amp;lbm_const_heap_mutex);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1432</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  // waste a cell if we have ended up unaligned after writing an array to flash.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1433</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 28 times">&check;</span><span class="takenBranch" title="Branch 1 taken 2380 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_const_heap_state->next % 2 == 1) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1434</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_const_heap_state->next++;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1435</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1436</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1437</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 2408 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_const_heap_state &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1438</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 2408 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>      (lbm_const_heap_state->next+1) &lt; lbm_const_heap_state->size) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1439</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    // A cons cell uses two words.</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1440</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_value cell = lbm_const_heap_state->next;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1441</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_const_heap_state->next += 2;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1442</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>    *res = (cell &lt;&lt; LBM_ADDRESS_SHIFT) | LBM_PTR_BIT | LBM_TYPE_CONS | LBM_PTR_TO_CONSTANT_BIT;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1443</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = LBM_FLASH_WRITE_OK;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1444</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1445</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>  mutex_unlock(&amp;lbm_const_heap_mutex);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1446</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1447</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1448</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1449</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_flash_status lbm_allocate_const_raw(lbm_uint nwords, lbm_uint *res) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1450</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_flash_status r = LBM_FLASH_FULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1451</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1452</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 28 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_const_heap_state &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1453</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 28 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>      (lbm_const_heap_state->next + nwords) &lt; lbm_const_heap_state->size) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1454</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_uint ix = lbm_const_heap_state->next;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1455</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    *res = (lbm_uint)&amp;lbm_const_heap_state->heap[ix];</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1456</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_const_heap_state->next += nwords;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1457</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = LBM_FLASH_WRITE_OK;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1458</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1459</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>28</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1460</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1461</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1462</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>462</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_flash_status lbm_write_const_raw(lbm_uint *data, lbm_uint n, lbm_uint *res) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1463</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1464</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>462</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_flash_status r = LBM_FLASH_FULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1465</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1466</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 462 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>462</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_const_heap_state &amp;&amp;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1467</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 462 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>462</pre></td>
    <td align="left" class="src coveredLine"><pre>      (lbm_const_heap_state->next + n) &lt; lbm_const_heap_state->size) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1468</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>462</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_uint ix = lbm_const_heap_state->next;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1469</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1470</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 980 times">&check;</span><span class="takenBranch" title="Branch 1 taken 462 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>1442</pre></td>
    <td align="left" class="src coveredLine"><pre>    for (unsigned int i = 0; i &lt; n; i ++) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1471</pre></td>
    <td align="right" class="linebranch"><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span><span class="takenBranch" title="Branch 2 taken 980 times">&check;</span></td>
    <td align="right" class="linecount coveredLine"><pre>980</pre></td>
    <td align="left" class="src coveredLine"><pre>      if (!const_heap_write(ix + i, ((lbm_uint*)data)[i]))</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1472</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>        return LBM_FLASH_WRITE_ERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1473</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1474</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>462</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_const_heap_state->next += n;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1475</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>462</pre></td>
    <td align="left" class="src coveredLine"><pre>    *res = (lbm_uint)&amp;lbm_const_heap_state->heap[ix];</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1476</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>462</pre></td>
    <td align="left" class="src coveredLine"><pre>    r = LBM_FLASH_WRITE_OK;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1477</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1478</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>462</pre></td>
    <td align="left" class="src coveredLine"><pre>  return r;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1479</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1480</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1481</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>84</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_flash_status lbm_const_write(lbm_uint *tgt, lbm_uint val) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1482</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1483</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 0 taken 84 times">&check;</span><span class="notTakenBranch" title="Branch 1 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>84</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (lbm_const_heap_state) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1484</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>84</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_uint flash = (lbm_uint)lbm_const_heap_state->heap;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1485</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>84</pre></td>
    <td align="left" class="src coveredLine"><pre>    lbm_uint ix = (((lbm_uint)tgt - flash) / sizeof(lbm_uint)); // byte address to ix</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1486</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 84 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>84</pre></td>
    <td align="left" class="src coveredLine"><pre>    if (const_heap_write(ix, val)) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1487</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>84</pre></td>
    <td align="left" class="src coveredLine"><pre>      return LBM_FLASH_WRITE_OK;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1488</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>    }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1489</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>    return LBM_FLASH_WRITE_ERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1490</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>  }</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1491</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return LBM_FLASH_FULL;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1492</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1493</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1494</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_flash_status write_const_cdr(lbm_value cell, lbm_value val) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1495</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint addr = lbm_dec_ptr(cell);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1496</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 2408 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (const_heap_write(addr+1, val))</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1497</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>    return LBM_FLASH_WRITE_OK;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1498</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return LBM_FLASH_WRITE_ERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1499</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1500</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1501</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>lbm_flash_status write_const_car(lbm_value cell, lbm_value val) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1502</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>  lbm_uint addr = lbm_dec_ptr(cell);</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1503</pre></td>
    <td align="right" class="linebranch"><span class="takenBranch" title="Branch 1 taken 2408 times">&check;</span><span class="notTakenBranch" title="Branch 2 not taken">&cross;</span></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>  if (const_heap_write(addr, val))</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1504</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount coveredLine"><pre>2408</pre></td>
    <td align="left" class="src coveredLine"><pre>    return LBM_FLASH_WRITE_OK;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1505</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return LBM_FLASH_WRITE_ERROR;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1506</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1507</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre></pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1508</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>lbm_uint lbm_flash_memory_usage(void) {</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1509</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount uncoveredLine"><pre></pre></td>
    <td align="left" class="src uncoveredLine"><pre>  return lbm_const_heap_state->next;</pre></td>
    </tr>

    <tr>
    <td align="right" class="lineno"><pre>1510</pre></td>
    <td align="right" class="linebranch"></td>
    <td align="right" class="linecount "><pre></pre></td>
    <td align="left" class="src "><pre>}</pre></td>
    </tr>

  </table>
  <br>

  <table width="100%" border="0" cellspacing="0" cellpadding="0">
    <tr><td class="hr"><td></tr>
    <tr><td class="footer">Generated by: <a href="http://gcovr.com">GCOVR (Version 4.2)</a></td></tr>
  </table>
  <br>

</body>

</html>

